home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / util / boot / codepw.lha / codepw 2.0 / install codePW 2.0 < prev    next >
Encoding:
Text File  |  1997-07-24  |  3.3 KB  |  126 lines

  1. ; passwortdatei codePW 2.0 by Jürgen Einrauch 16. Juli 1997      
  2. failat 21
  3.  
  4. echo "  *n*e[1;32m  ___________________________________________________"
  5. echo "  *e[43m                                                   *e[0m"
  6. echo "  *e[0;28;43m        Paßwortdatei codePW    Version 2.0*e[1m         *e[0m"
  7. echo "  *e[1;4;43m                                                   *e[0m*n"
  8.  
  9. IF EXISTS SYS:S/codePW
  10. echo "   *e[32mPaßwortdatei codePW existiert bereits.*e[0m"
  11. echo "   *e[32mInstallation wird abgebrochen.*e[0m"
  12. echo "*n   Lesen Sie dazu bitte die Informationsdatei."
  13. WAIT 4 secs
  14. EndCLI >NIL:
  15. quit
  16. ELSE
  17. echo "   Lesen Sie zuerst die Informationsdatei zu codePW !"
  18. echo noline "*n   Wollen Sie codePW jetzt installieren ? (Ja/Nein): "
  19. set > nil: Inp ?
  20. IF $Inp eq "ja"
  21.   skip start
  22. endif
  23. IF $Inp eq "j"
  24.   skip start
  25. endif
  26. IF $Inp eq "y"
  27.   skip start
  28. endif
  29. IF $Inp eq "yes"
  30.   skip start
  31. endif
  32. echo noline "*n   Installation abgebrochen."
  33. EndCLI >NIL:
  34. quit
  35.  
  36. lab start
  37. search >nil: from s:user-startup search "; Begin codePW"
  38. search >nil: from s:user-startup search "IF EXISTS S:codePW"
  39. search >nil: from s:user-startup search " EXECUTE S:codePW"
  40. search >nil: from s:user-startup search "ENDIF; END codePW"
  41. IF warn
  42. skip user
  43. ELSE
  44. echo ""
  45. skip install
  46. endif
  47.  
  48. lab user
  49. IF EXISTS SYS:S/User-StartUP
  50. echo "*n   Ergänze Ihr Verzeichnis S/User-StartUP."
  51. ELSE
  52. WAIT 2 secs
  53. echo "*n   Keine User-StartUP gefunden,"
  54. echo "   erstelle Verzeichnis neu." 
  55. echo "*n   Ergänze Ihr Verzeichnis S/User-StartUP." 
  56. skip userneu
  57. endif
  58.  
  59. lab userneu
  60. echo >ram:tmp "*n; Begin codePW"
  61. type >>s:user-startup ram:tmp
  62. echo >ram:tmp "IF EXISTS S:codePW"
  63. type >>s:user-startup ram:tmp
  64. echo >ram:tmp " EXECUTE S:codePW"
  65. type >>s:user-startup ram:tmp
  66. echo >ram:tmp "ENDIF; End codePW*n"
  67. type >>s:user-startup ram:tmp
  68. DELETE >NIL: ram:tmp
  69.  
  70. lab install
  71.  
  72. set > nil: pass;eingefügt
  73. echo "   Installiere Datei codePW."
  74. endif
  75. WAIT 2 secs
  76. echo "*n   Tragen Sie jetzt Ihre Anschrift ein."
  77. echo noline "*n   Vorname, Name      : "
  78. set > nil: nam ?
  79. echo  >ram:tmp "echo *"*""
  80. type >>s:codePW ram:tmp
  81. echo  >ram:tmp "echo *"    $nam*""
  82. type >>s:codePW ram:tmp
  83. echo noline "   Straße, Hausnummer : "
  84. set > nil: str ?
  85. echo  >ram:tmp "echo *"    $str*""
  86. type >>s:codePW ram:tmp
  87. echo noline "   PLZ, Wohnort       : "
  88. set > nil: plz ?
  89. echo  >ram:tmp "echo *"    $plz*""
  90. type >>s:codePW ram:tmp
  91. echo "*n   Tragen Sie jetzt ein Paßwort ein. Wählen Sie dazu"
  92. echo "   nur *e[32mein*e[0m zusammenhängendes Wort bzw. Zahlenkombination"
  93. echo "   *e[32mohne*e[0m Leertasten !*n"
  94. echo noline "   Paßwort            : "
  95. set > nil: eingabe ?
  96. echo  >ram:tmp "echo *"*""
  97. type >>s:codePW ram:tmp
  98. echo  >ram:tmp "lab passwort"
  99. type >>s:codePW ram:tmp
  100. echo  >ram:tmp "echo noline  *"    Paßwort: *""
  101. type >>s:codePW ram:tmp
  102. echo  >ram:tmp "set > nil: pass ?"
  103. type >>s:codePW ram:tmp
  104. echo  >ram:tmp "If $pass not eq *"$eingabe*""
  105. type >>s:codePW ram:tmp
  106. echo  >ram:tmp "skip back passwort"
  107. type >>s:codePW ram:tmp
  108. echo  >ram:tmp "endif"
  109. type >>s:codePW ram:tmp
  110. echo  >ram:tmp "unset >nil: pass"
  111. type >>s:codePW ram:tmp
  112. unset >nil: eingabe ;damned bug now fixed? 
  113. unset >nil: pass ;           "
  114.  
  115. DELETE >NIL: ram:tmp
  116. WAIT 2 secs
  117.  
  118. echo "*n   Installation beendet."
  119. echo "   Starten Sie Ihren Rechner neu und überpüfen Sie"
  120. echo "   die ordnungsgemäße Installation, indem Sie zunächst"
  121. echo "   ein falsches und danach das richtige Paßwort ein-"
  122. echo "   geben."
  123. WAIT 5 secs
  124. EndCLI >NIL:
  125. quit
  126.